﻿
Imports System
Imports System.Windows.Controls
Imports System.Windows.Controls.Primitives


Public Class eComicVirtualizingStackPanel
    Inherits VirtualizingStackPanel

    Protected Overrides Sub OnCleanUpVirtualizedItem(ByVal e As System.Windows.Controls.CleanUpVirtualizedItemEventArgs)
        Dim p As comicPage = CType(e.Value, comicPage)
        MyBase.OnCleanUpVirtualizedItem(e)
        If Not p Is Nothing Then p.cleanup()
    End Sub

End Class
